home *** CD-ROM | disk | FTP | other *** search
/ Internet Info 1994 March / Internet Info CD-ROM (Walnut Creek) (March 1994).iso / networking / mail / mh / updates / MH.6.7.1 < prev    next >
Text File  |  1990-12-13  |  31KB  |  1,082 lines
  1. Prereq: patch.0
  2. *** ../mh-6.7-dist/./Patchlevel    Thu Apr 12 13:31:00 1990
  3. --- ./Patchlevel    Fri Dec 14 09:17:57 1990
  4. ***************
  5. *** 1 ****
  6. ! MH.6.7 patch.0
  7. --- 1 ----
  8. ! MH.6.7 patch.1
  9. *** ../mh-6.7-dist/./uip/replsbr.c    Thu Apr 12 13:29:36 1990
  10. --- ./uip/replsbr.c    Mon Nov  5 11:38:46 1990
  11. ***************
  12. *** 1,6 ****
  13.   /* replsbr.c - routines to help repl along... */
  14.   #ifndef    lint
  15. ! static char ident[] = "@(#)$Id: replsbr.c,v 1.6 90/04/05 14:59:43 sources Exp $";
  16.   #endif    lint
  17.   
  18.   #include "../h/mh.h"
  19. --- 1,6 ----
  20.   /* replsbr.c - routines to help repl along... */
  21.   #ifndef    lint
  22. ! static char ident[] = "@(#)$Id: replsbr.c,v 1.9 90/11/05 11:38:43 mh Exp $";
  23.   #endif    lint
  24.   
  25.   #include "../h/mh.h"
  26. ***************
  27. *** 85,91 ****
  28.       char    *cp;
  29.       int      format_len;
  30.       register char **ap;
  31. -     struct comp **used_buf_fp;
  32.   
  33.       (void) umask( ~ m_gmprot() );
  34.       if ((out = fopen (drft, "w")) == NULL)
  35. --- 85,90 ----
  36. ***************
  37. *** 94,113 ****
  38.       cp = new_fs (form ? form : replcomps, NULLCP, NULLCP);
  39.       format_len = strlen (cp);
  40.       ncomps = fmt_compile (cp, &fmt) + 1;
  41. !     nxtbuf = compbuffers = (char **)calloc((unsigned)ncomps,sizeof(char *));
  42. !     if (nxtbuf == NULL)
  43.       adios (NULLCP, "unable to allocate component buffers");
  44. !     used_buf_fp = used_buf =
  45. !     (struct comp **)calloc((unsigned)(ncomps+1),sizeof(struct comp *));
  46. !     if (used_buf == NULL)
  47.       adios (NULLCP, "unable to allocate component buffer stack");
  48. !     used_buf += ncomps+1; *--used_buf = 0;
  49.       for (i = ncomps; i--; )
  50.       if ((*nxtbuf++ = malloc( SBUFSIZ )) == NULL)
  51.           adios (NULLCP, "unable to allocate component buffer");
  52.   
  53. !     nxtbuf = compbuffers;
  54. !     savecomp = used_buf;
  55.       tmpbuf = *nxtbuf++;
  56.   
  57.       for (ap = addrcomps; *ap; ap++) {
  58. --- 93,113 ----
  59.       cp = new_fs (form ? form : replcomps, NULLCP, NULLCP);
  60.       format_len = strlen (cp);
  61.       ncomps = fmt_compile (cp, &fmt) + 1;
  62. !     if ((nxtbuf = compbuffers = (char **)
  63. !         calloc((unsigned)ncomps,sizeof(char *))) 
  64. !         == (char **)NULL)
  65.       adios (NULLCP, "unable to allocate component buffers");
  66. !     if ((savecomp = used_buf = (struct comp **)
  67. !         calloc((unsigned)(ncomps+1),sizeof(struct comp *)))
  68. !         == (struct comp **)NULL)
  69.       adios (NULLCP, "unable to allocate component buffer stack");
  70. !     savecomp += ncomps + 1;
  71. !     *--savecomp = (struct comp *)0;    /* point at zero'd end minus 1 */
  72.       for (i = ncomps; i--; )
  73.       if ((*nxtbuf++ = malloc( SBUFSIZ )) == NULL)
  74.           adios (NULLCP, "unable to allocate component buffer");
  75.   
  76. !     nxtbuf = compbuffers;        /* point at start */
  77.       tmpbuf = *nxtbuf++;
  78.   
  79.       for (ap = addrcomps; *ap; ap++) {
  80. ***************
  81. *** 232,243 ****
  82.   
  83.       /* return dynamically allocated buffers */
  84.       free (scanl);
  85. !     while ( cptr = *savecomp++ )
  86. !     free (cptr->c_text);
  87. !     for (nxtbuf = compbuffers, i = ncomps; i--; )
  88. !         free (*nxtbuf++);
  89.       free ((char *) compbuffers);
  90. !     free ((char *) used_buf_fp);
  91.   }
  92.   
  93.   /*   */
  94. --- 232,244 ----
  95.   
  96.       /* return dynamically allocated buffers */
  97.       free (scanl);
  98. !     for (nxtbuf = compbuffers, i = ncomps;
  99. !         cptr = *savecomp++; nxtbuf++, i--)
  100. !     free (cptr->c_text);    /* if not nxtbuf, nxtbuf already freed */
  101. !     while ( i-- > 0)
  102. !         free (*nxtbuf++);    /* free unused nxtbufs */
  103.       free ((char *) compbuffers);
  104. !     free ((char *) used_buf);
  105.   }
  106.   
  107.   /*   */
  108. *** ../mh-6.7-dist/./uip/rcvdist.c    Thu Apr 12 13:29:36 1990
  109. --- ./uip/rcvdist.c    Mon Nov  5 13:50:16 1990
  110. ***************
  111. *** 1,6 ****
  112.   /* rcvdist.c - a rcvmail program to distribute messages */
  113.   #ifndef    lint
  114. ! static char ident[] = "@(#)$Id: rcvdist.c,v 1.4 90/04/05 14:59:35 sources Exp $";
  115.   #endif    lint
  116.   
  117.   #include "../h/mh.h"
  118. --- 1,6 ----
  119.   /* rcvdist.c - a rcvmail program to distribute messages */
  120.   #ifndef    lint
  121. ! static char ident[] = "@(#)$Id: rcvdist.c,v 1.6 90/11/05 13:50:14 mh Exp $";
  122.   #endif    lint
  123.   
  124.   #include "../h/mh.h"
  125. ***************
  126. *** 175,181 ****
  127.       char   *cp,
  128.              *scanl,
  129.               name[NAMESZ];
  130. -     struct comp **used_buf_fp;
  131.       register struct comp   *cptr,
  132.                             **savecomp;
  133.       FILE   *out;
  134. --- 175,180 ----
  135. ***************
  136. *** 186,208 ****
  137.       cp = new_fs (form ? form : rcvdistcomps, NULLCP, NULLCP);
  138.       format_len = strlen (cp);
  139.       ncomps = fmt_compile (cp, &fmt) + 1;
  140. !     nxtbuf = compbuffers = (char **) calloc ((unsigned) ncomps,
  141. !         sizeof (char *));
  142. !     if (nxtbuf == NULL)
  143.       adios (NULLCP, "unable to allocate component buffers");
  144. !     used_buf = (struct comp **) calloc ((unsigned) (ncomps + 1),
  145. !                             sizeof (struct comp *));
  146. !     if (used_buf == NULL)
  147.       adios (NULLCP, "unable to allocate component buffer stack");
  148. !     used_buf_fp = used_buf;
  149. !     used_buf += ncomps + 1;
  150. !     *--used_buf = 0;
  151.       for (i = ncomps; i--;)
  152.       if ((*nxtbuf++ = malloc (SBUFSIZ)) == NULL)
  153.           adios (NULLCP, "unable to allocate component buffer");
  154. - 
  155.       nxtbuf = compbuffers;
  156. -     savecomp = used_buf;
  157.       tmpbuf = *nxtbuf++;
  158.   
  159.       for (ap = addrcomps; *ap; ap++) {
  160. --- 185,205 ----
  161.       cp = new_fs (form ? form : rcvdistcomps, NULLCP, NULLCP);
  162.       format_len = strlen (cp);
  163.       ncomps = fmt_compile (cp, &fmt) + 1;
  164. !     if ((nxtbuf = compbuffers = (char **)
  165. !         calloc ((unsigned) ncomps, sizeof (char *)))
  166. !         == (char **)NULL)
  167.       adios (NULLCP, "unable to allocate component buffers");
  168. !     if ((savecomp = used_buf = (struct comp **)
  169. !         calloc ((unsigned) (ncomps + 1), sizeof (struct comp *)))
  170. !         == (struct comp **) NULL)
  171.       adios (NULLCP, "unable to allocate component buffer stack");
  172. !     savecomp += ncomps + 1;
  173. !     *--savecomp = 0;
  174. ! 
  175.       for (i = ncomps; i--;)
  176.       if ((*nxtbuf++ = malloc (SBUFSIZ)) == NULL)
  177.           adios (NULLCP, "unable to allocate component buffer");
  178.       nxtbuf = compbuffers;
  179.       tmpbuf = *nxtbuf++;
  180.   
  181.       for (ap = addrcomps; *ap; ap++) {
  182. ***************
  183. *** 277,288 ****
  184.       (void) fclose (out);
  185.   
  186.       free (scanl);
  187. !     while (cptr = *savecomp++)
  188.       free (cptr -> c_text);
  189. !     for (nxtbuf = compbuffers, i = ncomps; i--; )
  190.           free (*nxtbuf++);
  191.       free ((char *) compbuffers);
  192. !     free ((char *) used_buf_fp);
  193.   }
  194.   
  195.   /*   */
  196. --- 274,285 ----
  197.       (void) fclose (out);
  198.   
  199.       free (scanl);
  200. !     for (nxtbuf = compbuffers, i = ncomps; cptr = *savecomp++; nxtbuf++, i--)
  201.       free (cptr -> c_text);
  202. !     while (i-- > 0)
  203.           free (*nxtbuf++);
  204.       free ((char *) compbuffers);
  205. !     free ((char *) used_buf);
  206.   }
  207.   
  208.   /*   */
  209. *** ../mh-6.7-dist/./uip/rmf.c    Thu Apr 12 13:29:37 1990
  210. --- ./uip/rmf.c    Mon Nov  5 12:22:06 1990
  211. ***************
  212. *** 1,6 ****
  213.   /* rmf.c - remove a folder */
  214.   #ifndef    lint
  215. ! static char ident[] = "@(#)$Id: rmf.c,v 2.2 90/04/05 14:57:11 sources Exp $";
  216.   #endif    lint
  217.   
  218.   #include "../h/mh.h"
  219. --- 1,6 ----
  220.   /* rmf.c - remove a folder */
  221.   #ifndef    lint
  222. ! static char ident[] = "@(#)$Id: rmf.c,v 2.3 90/11/05 12:22:03 mh Exp $";
  223.   #endif    lint
  224.   
  225.   #include "../h/mh.h"
  226. ***************
  227. *** 13,19 ****
  228.   #define    INTRSW    0
  229.       "interactive", 0,
  230.   #define    NINTRSW    1
  231. !     "nointerative", 0,
  232.   
  233.   #define    HELPSW    2
  234.       "help", 4,
  235. --- 13,19 ----
  236.   #define    INTRSW    0
  237.       "interactive", 0,
  238.   #define    NINTRSW    1
  239. !     "nointeractive", 0,
  240.   
  241.   #define    HELPSW    2
  242.       "help", 4,
  243. *** ../mh-6.7-dist/./uip/rcvtty.c    Thu Apr 12 13:29:36 1990
  244. --- ./uip/rcvtty.c    Mon Nov  5 13:06:03 1990
  245. ***************
  246. *** 1,6 ****
  247.   /* rcvtty.c - a rcvmail program (a lot like rcvalert) handling IPC ttys */
  248.   #ifndef    lint
  249. ! static char ident[] = "@(#)$Id: rcvtty.c,v 1.5 90/04/05 15:02:11 sources Exp $";
  250.   #endif    lint
  251.   
  252.   #ifndef    BSD42
  253. --- 1,6 ----
  254.   /* rcvtty.c - a rcvmail program (a lot like rcvalert) handling IPC ttys */
  255.   #ifndef    lint
  256. ! static char ident[] = "@(#)$Id: rcvtty.c,v 1.6 90/11/05 13:05:54 mh Exp $";
  257.   #endif    lint
  258.   
  259.   #ifndef    BSD42
  260. ***************
  261. *** 18,24 ****
  262.   
  263.   /*   */
  264.   #define    SCANFMT    \
  265. ! "%2(hour{dtimenow}):%02(min{dtimenow}): %5(size) %<{encrypted}E%>\
  266.   %<(mymbox{from})To:%14(friendly{to})%|%17(friendly{from})%>  \
  267.   %{subject}%<{body}<<%{body}>>%>"
  268.   
  269. --- 18,24 ----
  270.   
  271.   /*   */
  272.   #define    SCANFMT    \
  273. ! "%2(hour{dtimenow}):%02(min{dtimenow}): %<(size)%5(size) %>%<{encrypted}E%>\
  274.   %<(mymbox{from})To:%14(friendly{to})%|%17(friendly{from})%>  \
  275.   %{subject}%<{body}<<%{body}>>%>"
  276.   
  277. *** ../mh-6.7-dist/./uip/dropsbr.c    Thu Apr 12 13:29:27 1990
  278. --- ./uip/dropsbr.c    Mon Nov  5 13:26:59 1990
  279. ***************
  280. *** 1,6 ****
  281.   /* dropsbr.c - write to a mailbox */
  282.   #ifndef    lint
  283. ! static char ident[] = "@(#)$Id: dropsbr.c,v 1.11 90/04/05 15:01:09 sources Exp $";
  284.   #endif    lint
  285.   
  286.   #include <stdio.h>
  287. --- 1,6 ----
  288.   /* dropsbr.c - write to a mailbox */
  289.   #ifndef    lint
  290. ! static char ident[] = "@(#)$Id: dropsbr.c,v 1.12 90/11/05 13:26:50 mh Exp $";
  291.   #endif    lint
  292.   
  293.   #include <stdio.h>
  294. ***************
  295. *** 408,413 ****
  296. --- 408,418 ----
  297.               if (*cp++ == '\n')
  298.                   size++;
  299.           }
  300. +         if (write (md, "\n", 1) != 1) {
  301. +         (void) fclose (fp);
  302. +         return NOTOK;
  303. +         }
  304. +         if (mapping) size += 2;
  305.   
  306.           (void) fclose (fp);
  307.           (void) lseek (fd, 0L, 2);
  308. *** ../mh-6.7-dist/./support/pop/popser.c    Thu Apr 12 13:29:23 1990
  309. --- ./support/pop/popser.c    Fri Nov 16 16:06:38 1990
  310. ***************
  311. *** 1,6 ****
  312.   /* popser.c - the POP service */
  313.   #ifndef    lint
  314. ! static char ident[]="@(#)$Id: popser.c,v 1.13 90/04/09 09:45:18 sources Exp Locker: sources $";
  315.   #endif
  316.   
  317.   #include "../h/mh.h"
  318. --- 1,6 ----
  319.   /* popser.c - the POP service */
  320.   #ifndef    lint
  321. ! static char ident[]="@(#)$Id: popser.c,v 1.16 90/11/16 14:56:38 mh Exp $";
  322.   #endif
  323.   
  324.   #include "../h/mh.h"
  325. ***************
  326. *** 40,48 ****
  327. --- 40,54 ----
  328.   extern char myhost[];
  329.   extern char *myname;
  330.   
  331. + #ifndef    POP2
  332.   static enum state {
  333.       auth1, auth2, trans, update, halt, error
  334.   } mystate;
  335. + #else
  336. + static enum state {
  337. +     auth1, auth2, trans, mbox, item, ack, update, halt, error
  338. + } mystate;
  339. + #endif
  340.   
  341.   
  342.   static int     user (), pass ();
  343. ***************
  344. *** 59,64 ****
  345. --- 65,73 ----
  346.   int    xtnd ();
  347.   #endif    BPOP
  348.   static int     quit ();
  349. + #ifdef    POP2
  350. + static int    helo (), rdp2 (), acks (), ack2 (), fold (), nack ();
  351. + #endif    POP2
  352.   
  353.   static struct vector {
  354.       char   *v_cmd;
  355. ***************
  356. *** 87,95 ****
  357.   #ifdef    BPOP
  358.       "xtnd", 1, 2, xtnd, trans, trans, trans,
  359.   #endif    BPOP
  360. - 
  361.       "quit", 0, 0, quit, trans, halt, halt,
  362.   
  363.       NULL
  364.   };
  365.   
  366. --- 96,121 ----
  367.   #ifdef    BPOP
  368.       "xtnd", 1, 2, xtnd, trans, trans, trans,
  369.   #endif    BPOP
  370.       "quit", 0, 0, quit, trans, halt, halt,
  371.   
  372. + #ifdef    POP2
  373. +     "helo", 2, 2, helo, auth1, mbox, auth1,
  374. + 
  375. +     "fold", 1, 1, fold, mbox, mbox, mbox,
  376. +     "quit", 0, 0, quit, mbox, halt, halt,
  377. +     "read", 0, 1, rdp2, mbox, item, error,
  378. + 
  379. +     "fold", 1, 1, fold, item, mbox, mbox,
  380. +     "read", 0, 1, rdp2, item, item, error,
  381. +     "quit", 0, 0, quit, item, halt, halt,
  382. +     "retr", 0, 0, retrieve, item, ack, error,
  383. + 
  384. +     "acks", 0, 0, ack2, ack, item, error,
  385. +     "ackd", 0, 0, ack2, ack, item, error,
  386. +     "nack", 0, 0, rdp2, ack, item, error,
  387. +     "quit", 0, 0, NULL, ack, halt, halt,
  388. + 
  389. + #endif    POP2
  390.       NULL
  391.   };
  392.   
  393. ***************
  394. *** 97,102 ****
  395. --- 123,131 ----
  396.   
  397.   /*   */
  398.   
  399. + #ifdef    POP2
  400. + static int pop2 = NOTOK;    /* current pop2 msg, or NOTOK if pop3 */
  401. + #endif    POP2
  402.   #ifdef    DPOP
  403.   static int pop_uid;
  404.   static int pop_gid;
  405. ***************
  406. *** 166,174 ****
  407. --- 195,209 ----
  408.   long    lseek ();
  409.   char   *crypt ();
  410.   
  411. + #ifdef    POPUUMBOX
  412. + #define    MBX_READ    pmbx_read
  413.   static    int    pmbx_read ();
  414.   static    char   *p_copy(), *p_copyin(), *p_nextword();
  415.   static        p_cmatch(), p_isdate(), p_ishead(), p_parse(), any();
  416. + #else
  417. + #define    MBX_READ    mbx_read
  418. + extern    int    mbx_read ();
  419. + #endif
  420.   
  421.   static int    setup(), setupaux(), read_map(), read_file(), pmbx_size();
  422.   static int    quitaux(), quitfile(), respond(), getline();
  423. ***************
  424. *** 311,316 ****
  425. --- 346,360 ----
  426.   }
  427.   
  428.   /*   */
  429. + #ifdef    POP2
  430. + static int  helo (vec)        /* sort of "user" and "pass" */
  431. + register char  **vec;
  432. + {
  433. +     pop2 = 0;                /* now we're talkin' pop2! */
  434. +     make_lower (username, vec[1]);    /* helo user pass */
  435. +     return pass (++vec);        /* user pass */
  436. + }
  437. + #endif
  438.   
  439.   static int  user (vec)
  440.   register char  **vec;
  441. ***************
  442. *** 565,573 ****
  443.       if (setupaux (guest) == NOTOK)
  444.       return NOTOK;
  445.   
  446.       return respond (OK,
  447.           nmsgs ? "maildrop has %d message%s (%d octets)" : "maildrop empty",
  448. !         nmsgs, nmsgs != 1 ? "s" : NULL, Msgs[0].m_size);
  449.   }
  450.   
  451.   /*   */
  452. --- 609,625 ----
  453.       if (setupaux (guest) == NOTOK)
  454.       return NOTOK;
  455.   
  456. + #ifdef    POP2
  457. +     if (pop2 != NOTOK) {        /* in response to pop2 "helo" */
  458. +     pop2 = nmsgs > 0 ? 1 : 0;
  459. +     return respond ('#', "%d message%s (%d octets)",
  460. +         nmsgs, nmsgs != 1 ? "s" : "", Msgs[0].m_size);
  461. +     }
  462. +     else
  463. + #endif    POP2
  464.       return respond (OK,
  465.           nmsgs ? "maildrop has %d message%s (%d octets)" : "maildrop empty",
  466. !         nmsgs, nmsgs != 1 ? "s" : "", Msgs[0].m_size);
  467.   }
  468.   
  469.   /*   */
  470. ***************
  471. *** 682,688 ****
  472.       padvise (NULLCP, LOG_DEBUG, "read_file (%ld, %d)",
  473.           pos, msgp);
  474.   
  475. !     if ((i = pmbx_read (dp, pos, &rp, debug)) <= 0)
  476.       return (msgp - 1);
  477.   
  478.       m_gMsgs ((msgp - 1) + i);
  479. --- 734,740 ----
  480.       padvise (NULLCP, LOG_DEBUG, "read_file (%ld, %d)",
  481.           pos, msgp);
  482.   
  483. !     if ((i = MBX_READ (dp, pos, &rp, debug)) <= 0)
  484.       return (msgp - 1);
  485.   
  486.       m_gMsgs ((msgp - 1) + i);
  487. ***************
  488. *** 753,758 ****
  489. --- 805,884 ----
  490.   }
  491.   
  492.   
  493. + #ifdef    POP2
  494. + static int  rdp2 (vec)        /* always returns OK */
  495. + char  **vec;
  496. + {
  497. +     if (vec[1]) {
  498. +     if ((pop2 = atoi (vec[1])) <= 0)
  499. +         pop2 = 0;
  500. +     }
  501. +     else if (pop2 == 0)
  502. +     return NOTOK;        /* close 'em down */
  503. + 
  504. +     if (pop2 <= 0 || pop2 > nmsgs) {
  505. +     pop2 = 0;
  506. +     return respond ('=', "0 no message"); 
  507. +     }
  508. +     if (Msgs[pop2].m_flags & MDELE) {
  509. +     pop2 = 0;
  510. +     return respond ('=', "0 message %d is deleted", pop2);
  511. +     }
  512. + 
  513. +     return respond ('=', "%d (message %d)", Msgs[pop2].m_size, pop2);
  514. + }
  515. + 
  516. + static int  ack2 (vec)
  517. + char   **vec;
  518. + {
  519. +     if (strcmp (vec[0], "ackd") == 0) {
  520. +     Msgs[pop2].m_flags |= MDELE;    /* ignored later if MREAD */
  521. +     Msgs[0].m_size -= Msgs[pop2].m_size;
  522. +     dmsgs++;
  523. +     }
  524. + 
  525. +     if (pop2) {        /* a current msg */
  526. +     rmsgs++;            /* mark this one as read */
  527. +     if (++pop2 > nmsgs)
  528. +         pop2 = -1;            /* let rdp2 reset */
  529. +     else if (Msgs[pop2].m_flags & MDELE)
  530. +         pop2 = -1;            /* let rdp2 reset */
  531. +     if (pop2 > Msgs[0].m_last)
  532. +         Msgs[0].m_last = pop2;
  533. +     }
  534. +     return rdp2 (vec);        /* vec = { "acks", 0 } */
  535. + }
  536. + 
  537. + static int  fold (vec)
  538. + register char  **vec;
  539. + {
  540. +     pop2 = 0;
  541. + 
  542. + #ifdef    notdef        
  543. + 
  544. + /* This might work, or it might be a huge security hole.  For my purpose,
  545. +  * it doesn't need to work, so I'm not going to make sure it's OK.
  546. +  * 16Nov90/JLR
  547. +  */
  548. +    
  549. +     if (quitaux (NULLVP) == NOTOK)
  550. +     return respond ('#', "0 unable to close folder");
  551. +     
  552. +     (void) sprintf (maildrop, vec[1]);
  553. +     if (setupaux (access (maildrop, 2) ? 1 : 0) == NOTOK)
  554. +     return respond ('#', "0 unable to read %s", maildrop);
  555. + 
  556. +     pop2 = nmsgs > 0 ? 1 : 0;
  557. +     return respond ('#', "%d message%s in %s (%d octets)",
  558. +         nmsgs, nmsgs != 1 ? "s" : "", maildrop, Msgs[0].m_size);
  559. +     
  560. + #endif
  561. + 
  562. +     respond ('#', "0 unable to change folders");
  563. +     return NOTOK;
  564. + }
  565. + #endif    POP2
  566. + 
  567.   static int  list (vec)
  568.   register char  **vec;
  569.   {
  570. ***************
  571. *** 773,779 ****
  572.       }
  573.   
  574.       (void) respond (OK, "%d message%s (%d octets)",
  575. !         nmsgs - dmsgs, nmsgs - dmsgs != 1 ? "s" : NULL,
  576.           Msgs[0].m_size);
  577.       for (i = 1; i <= nmsgs; i++)
  578.       if (!(Msgs[i].m_flags & MDELE))
  579. --- 899,905 ----
  580.       }
  581.   
  582.       (void) respond (OK, "%d message%s (%d octets)",
  583. !         nmsgs - dmsgs, nmsgs - dmsgs != 1 ? "s" : "",
  584.           Msgs[0].m_size);
  585.       for (i = 1; i <= nmsgs; i++)
  586.       if (!(Msgs[i].m_flags & MDELE))
  587. ***************
  588. *** 798,803 ****
  589. --- 924,934 ----
  590.       register char  *cp;
  591.       char    buffer[BUFSIZ];
  592.   
  593. + #ifdef    POP2
  594. +   if (pop2 == 0)
  595. +     return NOTOK;
  596. +   else if (pop2 == NOTOK) {
  597. + #endif
  598.       if ((i = atoi (vec[1])) <= 0 || i > nmsgs)
  599.       return respond (NOTOK, "no such message: \"%s\"", vec[1]);
  600.       if (Msgs[i].m_flags & MDELE)
  601. ***************
  602. *** 804,809 ****
  603. --- 935,945 ----
  604.       return respond (NOTOK, "message %d is deleted", i);
  605.   
  606.       (void) respond (OK, "%d octets", Msgs[i].m_size);
  607. + #ifdef    POP2
  608. +   }
  609. +   else        /* if called by pop2, vec = { "retr", 0 } */
  610. +     i = pop2;
  611. + #endif
  612.   
  613.       for ((void) fseek (dp, pos = Msgs[i].m_start, 0);
  614.           fgets (buffer, sizeof buffer, dp) != NULL && pos < Msgs[i].m_stop;
  615. ***************
  616. *** 812,817 ****
  617. --- 948,956 ----
  618.           *cp = NULL;
  619.       multiline ("%s", buffer);
  620.       }
  621. + #ifdef    POP2
  622. +   if (pop2 == NOTOK) {        /* then multiend */
  623. + #endif
  624.       multiend ();
  625.   
  626.       if (i > Msgs[0].m_last) {
  627. ***************
  628. *** 818,823 ****
  629. --- 957,965 ----
  630.       Msgs[0].m_last = i; 
  631.       rmsgs++;
  632.       }
  633. + #ifdef    POP2
  634. +   }
  635. + #endif
  636.   
  637.       return OK;
  638.   }
  639. ***************
  640. *** 1147,1153 ****
  641.       return respond (OK,
  642.           n ? "%s signing off (%d message%s, %d octets left)"
  643.           : "%s signing off (maildrop empty)",
  644. !         server, n - d, n - d != 1 ? "s" : NULL, Msgs[0].m_size);
  645.   }
  646.   
  647.   
  648. --- 1289,1295 ----
  649.       return respond (OK,
  650.           n ? "%s signing off (%d message%s, %d octets left)"
  651.           : "%s signing off (maildrop empty)",
  652. !         server, n - d, n - d != 1 ? "s" : "", Msgs[0].m_size);
  653.   }
  654.   
  655.   
  656. ***************
  657. *** 1314,1323 ****
  658.       char    buffer[BUFSIZ];
  659.   
  660.       bp = buffer;
  661. !     bp += strlen (sprintf (bp, "%s%s", code == OK ? "+OK" : "-ERR",
  662. !         fmt ? " " : NULL));
  663. !     if (fmt)
  664. !     bp += strlen (sprintf (bp, fmt, a, b, c, d));
  665.       putline (buffer, output);
  666.   
  667.       return code;
  668. --- 1456,1482 ----
  669.       char    buffer[BUFSIZ];
  670.   
  671.       bp = buffer;
  672. ! #ifndef    POP2
  673. !     (void) sprintf (bp, "%s%s", code == OK ? "+OK" : "-ERR", fmt ? " " : "");
  674. !     bp += strlen (bp);
  675. ! #else
  676. !     switch (code) {
  677. !     case OK:
  678. !     case NOTOK:
  679. !         (void) sprintf (bp, "%s%s", code == OK ? "+OK" : "-ERR",
  680. !             fmt ? " " : "");
  681. !         bp += strlen (bp);
  682. !         break;
  683. ! 
  684. !     default:        /* only happens in pop2 */
  685. !         *bp++ = code;
  686. !         code = OK;
  687. !     }
  688. ! #endif
  689. !     if (fmt) {
  690. !     (void) sprintf (bp, fmt, a, b, c, d);
  691. !     bp += strlen (bp);
  692. !     }
  693.       putline (buffer, output);
  694.   
  695.       return code;
  696. ***************
  697. *** 1457,1464 ****
  698. --- 1616,1638 ----
  699.    * INET: steved@longs.LANCE.ColoState.Edu, dempsey@handel.CS.ColoState.Edu
  700.    * boulder!ccncsu!longs.LANCE.ColoState.Edu!steved, ...!ncar!handel!dempsey
  701.    */
  702. + /* From:    Jim Reid <jim@computer-science.strathclyde.ac.UK>
  703. +  * 
  704. +  * MH-6.7 does not support MMDF-style mailboxes with POP as claimed. It
  705. +  * appears that when code was added to popser.c to support UNIX-style
  706. +  * mailboxes, the old behaviour was lost. i.e. The new popd worked with
  707. +  * UNIX-style mailboxes, but not MMDF ones. Users would get "format error"
  708. +  * error messages if they tried to inc a remote MMDF-style mailbox because
  709. +  * the pop daemon didn't want to know or like the MMDF message delimiters.
  710. +  */
  711.   
  712. + /* So... Now there's an incredible hack in mhconfig.c to define POPUUMBOX
  713. +  * in support/pop/Makefile if we're using Sendmail.  This causes this
  714. +  * UUCP-mbox reading code to be used here.  Ugh.  05Nov90/JLR
  715. +  */
  716. + 
  717.   /*   */
  718. + #ifdef    POPUUMBOX
  719.   /* from dropsbr.c - read from a mailbox - pop server version */
  720.   
  721.   /* ALMOST IDENTICAL to mbx_read */
  722. ***************
  723. *** 1863,1865 ****
  724. --- 2037,2040 ----
  725.               return(1);
  726.       return(0);
  727.   }
  728. + #endif
  729. *** ../mh-6.7-dist/./sbr/m_sync.c    Thu Apr 12 13:29:03 1990
  730. --- ./sbr/m_sync.c    Mon Nov  5 11:47:29 1990
  731. ***************
  732. *** 1,4 ****
  733. --- 1,7 ----
  734.   /* m_sync.c - synchronize message sequences */
  735. + #ifndef    lint
  736. + static char ident[] = "@(#)$Id: m_sync.c,v 1.6 90/11/05 11:46:34 mh Exp $";
  737. + #endif    lint
  738.   
  739.   #include "../h/mh.h"
  740.   #include <stdio.h>
  741. ***************
  742. *** 60,67 ****
  743.           continue;
  744.           if (fp == NULL) {
  745.           if ((fp = fopen (seq, "w")) == NULL
  746. !             && unlink (seq) != NOTOK 
  747. !             && (fp = fopen (seq, "w")) == NULL) {
  748.               admonish (attr, "unable to write");
  749.               goto priv;
  750.           }
  751. --- 63,70 ----
  752.           continue;
  753.           if (fp == NULL) {
  754.           if ((fp = fopen (seq, "w")) == NULL
  755. !             && (unlink (seq) == NOTOK ||
  756. !                 (fp = fopen (seq, "w")) == NULL)) {
  757.               admonish (attr, "unable to write");
  758.               goto priv;
  759.           }
  760. *** ../mh-6.7-dist/./sbr/addrsbr.c    Thu Apr 12 13:28:50 1990
  761. --- ./sbr/addrsbr.c    Mon Nov  5 12:26:57 1990
  762. ***************
  763. *** 1,4 ****
  764. --- 1,7 ----
  765.   /* addrsbr.c - parse addresses 822-style */
  766. + #ifndef    lint
  767. + static char ident[] = "@(#)$Id: addrsbr.c,v 1.7 90/11/05 12:26:41 mh Exp $";
  768. + #endif    lint
  769.   
  770.   #include "../h/mh.h"
  771.   #include "../h/addrsbr.h"
  772. ***************
  773. *** 830,835 ****
  774. --- 833,840 ----
  775.           }
  776.   #else    not BERK
  777.       for (mp = &mq; mp = mp -> m_next;) {
  778. +     if (np -> m_mbox == NULL)
  779. +         continue;
  780.       if ((len = strlen (cp = np -> m_mbox))
  781.           < (i = strlen (pp = mp -> m_mbox)))
  782.           continue;
  783. ***************
  784. *** 854,859 ****
  785. --- 859,866 ----
  786.   
  787.       if (mp -> m_nohost)
  788.           return 1;
  789. +     if (np -> m_host == NULL)
  790. +         continue;
  791.       if ((len = strlen (cp = np -> m_host))
  792.           < (i = strlen (pp = mp -> m_host)))
  793.           continue;
  794. *** ../mh-6.7-dist/./sbr/m_getfld.c    Thu Apr 12 13:29:01 1990
  795. --- ./sbr/m_getfld.c    Wed Apr 18 13:48:20 1990
  796. ***************
  797. *** 1,4 ****
  798. --- 1,7 ----
  799.   /* m_getfld.c - read/parse a message */
  800. + #ifndef    lint
  801. + static char ident[] = "@(#)$Id: m_getfld.c,v 1.8 90/04/18 13:48:12 sources Exp $";
  802. + #endif    lint
  803.   
  804.   #include "../h/mh.h"
  805.   #include <stdio.h>
  806. ***************
  807. *** 542,550 ****
  808. --- 545,557 ----
  809.            */
  810.           return 1;
  811.   
  812. + #ifdef notdef
  813.       (void) fseek (iob, (long)(pos-1), 0);
  814.       if (iob->_cnt <= 0)
  815.           _filbuf(iob);
  816. + #else
  817. +     (void) fseek (iob, pos, 0);
  818. + #endif /* !notdef */
  819.       return 0;
  820.       }
  821.   
  822. *** ../mh-6.7-dist/./conf/mhconfig.c    Thu Apr 12 13:27:24 1990
  823. --- ./conf/mhconfig.c    Mon Nov  5 16:24:58 1990
  824. ***************
  825. *** 1,7 ****
  826.   /* mhconfig.c - configure MH */
  827.   /* cc [-DSYS5] mhconfig.c -o mhconfig */
  828.   #ifndef    lint
  829. ! static char ident[] = "@(#)$Id: mhconfig.c,v 2.23 90/04/08 10:57:33 sources Exp $";
  830.   #endif    lint
  831.   
  832.   #include <ctype.h>
  833. --- 1,7 ----
  834.   /* mhconfig.c - configure MH */
  835.   /* cc [-DSYS5] mhconfig.c -o mhconfig */
  836.   #ifndef    lint
  837. ! static char ident[] = "@(#)$Id: mhconfig.c,v 2.26 90/11/05 16:24:55 mh Exp $";
  838.   #endif    lint
  839.   
  840.   #include <ctype.h>
  841. ***************
  842. *** 420,425 ****
  843. --- 420,428 ----
  844.           fprintf (fp, "/^@BEGIN: SENDMTSHACK$/,/^@END: SENDMTSHACK$/d\n");
  845.           break;
  846.       }
  847. +     /* special hack for support/pop/popser.c */
  848. +     fprintf (fp, "s%%@(POPUUMBOX)%%%s%%g\n",
  849. +         mtsnum == sendmail ? "-DPOPUUMBOX" : "");
  850.   
  851.       if (bsd43)        /* for sgid(tty)-rcvtty */
  852.       fprintf (fp, "/^@BEGIN: BSD43$/d\n/^@END: BSD43$/d\n");
  853. *** ../mh-6.7-dist/./conf/mh-gen.8    Thu Apr 12 13:27:24 1990
  854. --- ./conf/mh-gen.8    Wed Nov 21 09:58:36 1990
  855. ***************
  856. *** 1,2 ****
  857. ! .\" @(#)$Id: mh-gen.8,v 2.48 90/04/09 13:27:27 sources Exp $
  858.   .\" uneven inter-word spacing (nroff line adjusting) hampers readability
  859. --- 1,2 ----
  860. ! .\" @(#)$Id: mh-gen.8,v 2.50 90/11/21 09:27:52 mh Exp Locker: mh $
  861.   .\" uneven inter-word spacing (nroff line adjusting) hampers readability
  862. ***************
  863. *** 224,225 ****
  864. --- 224,226 ----
  865.   or, \*(lqmh\*(rq to have \fIMH\fR as the transport system.
  866. + 
  867.   On UNIX systems supporting TCP/IP networking via sockets
  868. ***************
  869. *** 229,234 ****
  870.   \fISendMail\fR.
  871. ! The \*(lq/smtp\*(rq suffix is described in detail in the \fIAdministrator's
  872. ! Guide\fR.
  873. ! Hence,
  874. ! for TCP/IP UNIX systems,
  875.   the \*(lq/smtp\*(rq suffix to either \*(lqsendmail\*(rq or \*(lqmmdf2\*(rq is
  876. --- 230,232 ----
  877.   \fISendMail\fR.
  878. ! Hence, for TCP/IP UNIX systems,
  879.   the \*(lq/smtp\*(rq suffix to either \*(lqsendmail\*(rq or \*(lqmmdf2\*(rq is
  880. ***************
  881. *** 235,236 ****
  882. --- 233,237 ----
  883.   the preferred MTS configuration.
  884. + The \*(lq/smtp\*(rq suffix is described in detail in the \fIAdministrator's
  885. + Guide\fR; be sure to set \*(lqservers:\*(rq as described in
  886. + \fImh\-tailor\fR\0(8) if you use this option.
  887.   
  888. ***************
  889. *** 246,248 ****
  890.   If \*(lqpop\*(rq (formerly \*(lqpopbboards:\ on\*(rq),
  891. ! include support for the UCI BBoards facility via the POP service;
  892.   this setting requires \*(lqpop:\ on\*(rq.
  893. --- 247,249 ----
  894.   If \*(lqpop\*(rq (formerly \*(lqpopbboards:\ on\*(rq),
  895. ! include support for the UCI BBoards facility via the POP3 service;
  896.   this setting requires \*(lqpop:\ on\*(rq.
  897. ***************
  898. *** 261,263 ****
  899.   To read remote BBoards,
  900. ! the usual configuration would have \fIbbc\fR talk to a \fIPOP\fR or
  901.   \fINNTP\fR server.
  902. --- 262,264 ----
  903.   To read remote BBoards,
  904. ! the usual configuration would have \fIbbc\fR talk to a \fIPOP3\fR or
  905.   \fINNTP\fR server.
  906. ***************
  907. *** 290,294 ****
  908.   you intend to use POP.)
  909. ! If POP is enabled, there are two additional options which are of interest:
  910. ! \*(lqRPOP\*(rq and \*(lqDPOP\*(rq.
  911. ! The former indicates that support for the UNIX variant of POP,
  912.   RPOP, which uses privileged sockets for authentication be enabled.
  913. --- 291,295 ----
  914.   you intend to use POP.)
  915. ! If POP is enabled, there are three additional options which are of interest:
  916. ! \*(lqRPOP\*(rq, \*(lqDPOP\*(rq and \*(lqPOP2\*(rq.
  917. ! The first indicates that support for the UNIX variant of POP,
  918.   RPOP, which uses privileged sockets for authentication be enabled.
  919. ***************
  920. *** 298,300 ****
  921.   and instead have their own separate database (another major win).
  922. ! Both of these options can be enabled via an \*(lqoptions\*(rq directive in the
  923.   \fIMH\fR configuration file.
  924. --- 299,304 ----
  925.   and instead have their own separate database (another major win).
  926. ! The \*(lqPOP2\*(rq option indicates that the \fIMH\fP POP daemon should
  927. ! speak the older POP2 protocol in addition to the \fIMH\fP POP3 protocol \-
  928. ! a major win.
  929. ! All of these options can be enabled via an \*(lqoptions\*(rq directive in the
  930.   \fIMH\fR configuration file.
  931. ***************
  932. *** 500,501 ****
  933. --- 504,516 ----
  934.   .ti -.5i
  935. + POP2
  936. + .br
  937. + Have the POP daemon understand the older
  938. + POP2 protocol as well as the \fIMH\fP POP3 protocol \- a major win.
  939. + The POP daemon auto-magically
  940. + determines which POP protocol your client is using.
  941. + If you're enabling POP service,
  942. + there's no reason not to enable this option as well.
  943. + See also \fIPOPSERVICE\fR.
  944. + 
  945. + .ti -.5i
  946.   POPSERVICE
  947. ***************
  948. *** 503,507 ****
  949.   The port name the \fIMH\fP POP will use.  For historical reasons,
  950. ! this defaults to \*(lqpop\*(rq.  The \fIMH\fP POP protocol
  951. ! (POP version 3) has finally been assigned its own port number (110),
  952. ! which differs from the original POP (version 1) port number (109).
  953.   To have \fIMH\fP POP use the new assigned port number, 
  954. --- 518,524 ----
  955.   The port name the \fIMH\fP POP will use.  For historical reasons,
  956. ! this defaults to \*(lqpop\*(rq.
  957. ! In 1987, the \fIMH\fP POP protocol
  958. ! (POP version 3) was published as RFC1081 and
  959. ! was assigned its own port number (110),
  960. ! which differs from the original POP (version 1 and 2) port number (109).
  961.   To have \fIMH\fP POP use the new assigned port number, 
  962. ***************
  963. *** 510,511 ****
  964. --- 527,530 ----
  965.   and server hosts as \*(lq110/tcp\*(rq.
  966. + If you enable \fIPOP2\fP, you can safely leave this undefined unless
  967. + you are using POP3 clients besides \fIMH\fP.
  968.   
  969. *** ../mh-6.7-dist/./conf/makefiles/mtsM    Thu Apr 12 13:27:21 1990
  970. --- ./conf/makefiles/mtsM    Mon Nov  5 12:08:17 1990
  971. ***************
  972. *** 4,6 ****
  973.   #    @(MHWARNING)
  974. ! # @(#)$Id: mtsM,v 2.2 90/04/05 15:17:58 sources Exp $
  975.   ##############################################################################
  976. --- 4,6 ----
  977.   #    @(MHWARNING)
  978. ! # @(#)$Id: mtsM,v 2.3 90/04/18 13:47:30 sources Exp $
  979.   ##############################################################################
  980. ***************
  981. *** 51,53 ****
  982.   
  983. ! clean:;        for d in $(DIRS); do (cd $$d; $(MAKE) clean); done
  984.   
  985. --- 51,54 ----
  986.   
  987. ! clean:;        -rm -f $(LIB) $(LLIB)
  988. !         for d in $(DIRS); do (cd $$d; $(MAKE) clean); done
  989.   
  990. *** ../mh-6.7-dist/./conf/makefiles/support/pop    Thu Apr 12 13:27:22 1990
  991. --- ./conf/makefiles/support/pop    Mon Nov  5 16:06:05 1990
  992. ***************
  993. *** 4,6 ****
  994.   #    @(MHWARNING)
  995. ! # @(#)$Id: pop,v 2.5 90/04/05 15:16:16 sources Exp $
  996.   ##############################################################################
  997. --- 4,6 ----
  998.   #    @(MHWARNING)
  999. ! # @(#)$Id: pop,v 2.7 90/11/05 16:06:03 mh Exp $
  1000.   ##############################################################################
  1001. ***************
  1002. *** 11,13 ****
  1003.   LIBDIR    =    $(DESTDIR)@(MHETCPATH)
  1004. ! OPTIONS    =    @(MHOPTIONS) -I..
  1005.   LDOPTIONS=    @(LDOPTIONS)
  1006. --- 11,13 ----
  1007.   LIBDIR    =    $(DESTDIR)@(MHETCPATH)
  1008. ! OPTIONS    =    @(MHOPTIONS) @(POPUUMBOX) -I..
  1009.   LDOPTIONS=    @(LDOPTIONS)
  1010. *** ../mh-6.7-dist/./conf/examples/uci    Thu Apr 12 13:27:15 1990
  1011. --- ./conf/examples/uci    Mon Apr 16 15:49:23 1990
  1012. ***************
  1013. *** 24,26 ****
  1014.   ranlib  on
  1015. ! sharedlib on
  1016.   slibdir    /usr/local/lib
  1017. --- 24,26 ----
  1018.   ranlib  on
  1019. ! sharedlib off
  1020.   slibdir    /usr/local/lib
  1021. *** ../mh-6.7-dist/./conf/doc/mh-mts.rf    Thu Apr 12 13:27:09 1990
  1022. --- ./conf/doc/mh-mts.rf    Wed Nov 21 10:09:34 1990
  1023. ***************
  1024. *** 1,3 ****
  1025.   .\"    @(MHWARNING)
  1026. ! .\" @(#)$Id: mh-mts.rf,v 1.6 90/04/05 15:08:37 sources Exp $
  1027.   .SC MH\-MTS 8
  1028. --- 1,3 ----
  1029.   .\"    @(MHWARNING)
  1030. ! .\" @(#)$Id: mh-mts.rf,v 1.7 90/11/21 10:09:32 mh Exp $
  1031.   .SC MH\-MTS 8
  1032. ***************
  1033. *** 55,56 ****
  1034. --- 55,58 ----
  1035.   this approach can be tolerant of faults.
  1036. + Be sure to set \*(lqservers:\*(rq as described in
  1037. + mh\-tailor(8) if you use this option.
  1038.   
  1039. *** ../mh-6.7-dist/./conf/config/mts.c    Thu Apr 12 13:27:04 1990
  1040. --- ./conf/config/mts.c    Mon Nov  5 12:06:51 1990
  1041. ***************
  1042. *** 1,4 ****
  1043. --- 1,7 ----
  1044.   /* mts.c - definitions for the mail transport system */
  1045. + #ifndef    lint
  1046. + static char ident[] = "@(#)$Id: mts.c,v 2.6 90/11/05 12:06:39 mh Exp $";
  1047. + #endif    lint
  1048.   
  1049.   /* LINTLIBRARY */
  1050.   
  1051. ***************
  1052. *** 485,498 ****
  1053.           continue;
  1054.       *cp = NULL;
  1055.       }
  1056. -     /*
  1057. -      *  If the fullname contains any .'s, quote it
  1058. -      */
  1059. -     if (index(fullname, '.')) {
  1060. -       char tmp[BUFSIZ];
  1061. -       sprintf (tmp, "\"%s\"", fullname);
  1062. -       strcpy (fullname, tmp);
  1063. -     }
  1064.       if (MMailids == 0 || *np == NULL) {
  1065.       (void) strcpy (username, pw -> pw_name);
  1066.       fullname[0] = NULL;
  1067. --- 488,493 ----
  1068. ***************
  1069. *** 499,504 ****
  1070. --- 494,504 ----
  1071.       }
  1072.       if ((cp = getenv ("SIGNATURE")) && *cp)
  1073.       (void) strcpy (fullname, cp);
  1074. +     if (index(fullname, '.')) {        /*  quote any .'s */
  1075. +       char tmp[BUFSIZ];
  1076. +       sprintf (tmp, "\"%s\"", fullname);
  1077. +       strcpy (fullname, tmp);
  1078. +     }
  1079.   
  1080.       return username;
  1081.   }
  1082.